home *** CD-ROM | disk | FTP | other *** search
/ Komputer for Alle 1999 #8 / 1999 CD 8 (black).iso / maskdemo / DATA1.CAB / Program_Executable_Files / Daventry / KQ / WIZBOOK.CS < prev    next >
Encoding:
Text File  |  1998-12-15  |  2.7 KB  |  108 lines

  1. echo $1 $2 $3 $4 $5 $6 $7
  2. if test $2 == ConnorAction
  3.     if test $3 == do
  4.         if test $Daventry::WizBook::Animation == stop
  5.             echo Say something cute
  6.             KQMonster::speak Connor Connor 1000 61 0 0 1 1
  7.  
  8.         else if test $Daventry::WizBook::Animation == SecondStop
  9.             echo I'm Here!!!
  10.             setThirdPerson
  11.             handsOff 1
  12.             sendEvent 0 wizbook KQCueEvent 3
  13.  
  14.         else
  15.             echo Say something cuter
  16.             KQMonster::speak Connor Connor 1000 61 14 74 1 0
  17.  
  18.         endif
  19.         endif
  20.     endif
  21.  
  22. else if test $2 == TalkComplete
  23.     if eval KQMonster::testMessage $3 $4 $5 $6 $7 1000 63 0 0 1
  24.         echo rip!
  25.         KQMonster::clearStateChangeNotify wizbook Connor
  26.         sendEvent 0 wizbook KQAnimPlayEvent rip
  27.         KQMonster::setState Connor Special 'AnimList=wizbook.anm,AnimListOn,c_ripout'
  28.         getEndLoop Connor $1 1
  29.     endif
  30.  
  31. else if test $2 == Cue
  32.     if test $3 == 1
  33.         echo write!
  34.         setThirdPerson
  35.         handsOff 1
  36.         KQCamera::addCamLoc 142748 205000 14800 1
  37.         KQCamera::cutToCamLoc 141803 204188 12986
  38.         sendEvent 0 wizbook KQAnimPlayEvent write
  39.         getEndLoop $1 $1 1
  40.  
  41.     else if test $3 == 2
  42.         if test $4 == 1
  43.             echo Beginning to stop
  44.             sendEvent 1.0 wizbook KQCueEvent 2 0
  45.         else
  46.             echo speak!
  47.             move Connor 0 141736 204600 13000 0 0 0
  48.             KQCamera::addCamLoc 142748 205000 14800 1
  49.             KQCamera::cutToCamLoc 141803 204188 12986
  50.             #move KQCamera 0 142748 205000 14800
  51.             KQMonster::stateChangeNotify wizbook Connor
  52.             KQMonster::speak Connor Connor 1000 63 0 0 1 1
  53.         endif
  54.  
  55.     else if test $3 == 3
  56.         checkDistance wizbook Connor 1500
  57.         if test $Console::Return == 1
  58.             KQObject::collisionType wizquill -1
  59.             KQObject::collisionType wizbook -1
  60.             sendEvent 0 wizbook KQCueEvent 2 0
  61.         else
  62.             echo walk to
  63.             KQObject::collisionType wizquill -1
  64.             KQObject::collisionType wizbook -1
  65.  
  66. # Walk to seems to be flakey. When I have time, I might return to this
  67. #            KQConner::walkTo 141900 205550 wizbook 2 1
  68.             sendEvent 0 wizbook KQCueEvent 2 0
  69.         endif
  70.  
  71.     else if test $3 == 4
  72.         echo ...And turn and flip...
  73.         pointAndCue 141803 204188 12986 wizbook 2 0
  74.  
  75.     else if test $3 == 300
  76.         if test $5 == c_ripout
  77.             getEndLoop Connor $1 0
  78.             give INVITEM_SpellPage
  79.             handsOff 0
  80.             KQCamera::follow Connor
  81.             move KQCamera 0 143187 205962 13500
  82.             setThirdPerson
  83.             KQCamera::follow Connor
  84.             KQObject::collisionType wizbook +1
  85.             set Daventry::WizBook::Animation done
  86.             sendEvent 0 wizbook KQAnimPlayEvent stop
  87.  
  88.         else if test $5 == write
  89.             # KQMonster::speak Connor Connor 1000 62 0 0 1 1
  90.             handsOff 0
  91.             KQCamera::follow Connor
  92.             setThirdPerson
  93.             set Daventry::WizBook::Animation SecondStop
  94.             sendEvent 0 wizbook KQAnimPlayEvent SecondStop
  95.             sendEvent 0 wizquill KQAnimPlayEvent stop
  96.             getEndLoop $1 $1 0
  97.  
  98.         endif
  99.         endif
  100.     endif
  101.     endif
  102.     endif
  103.     endif
  104.     endif
  105. endif
  106. endif
  107. endif
  108.